home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / AIncludes / OCEStandardDirectory.a < prev    next >
Encoding:
Text File  |  1996-05-01  |  23.0 KB  |  909 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        OCEStandardDirectory.a
  3. ;
  4. ;    Contains:    Apple Open Collaboration Environment Standard Directory Interfaces.
  5. ;
  6. ;    Version:    Technology:    AOCE Toolbox 1.02
  7. ;                Release:    Universal Interfaces 3.0d3 on Copland DR1
  8. ;
  9. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10. ;
  11. ;    Bugs?:        If you find a problem with this file, send the file and version
  12. ;                information (from above) and the problem description to:
  13. ;
  14. ;                    Internet:    apple.bugs@applelink.apple.com
  15. ;                    AppleLink:    APPLE.BUGS
  16. ;
  17. ;
  18.     IF &TYPE('__OCESTANDARDDIRECTORY__') = 'UNDEFINED' THEN
  19. __OCESTANDARDDIRECTORY__ SET 1
  20.  
  21.     IF &TYPE('__ICONS__') = 'UNDEFINED' THEN
  22.     include 'Icons.a'
  23.     ENDIF
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27.     IF &TYPE('__WINDOWS__') = 'UNDEFINED' THEN
  28.     include 'Windows.a'
  29.     ENDIF
  30.     IF &TYPE('__OCE__') = 'UNDEFINED' THEN
  31.     include 'OCE.a'
  32.     ENDIF
  33.     IF &TYPE('__OCEAUTHDIR__') = 'UNDEFINED' THEN
  34.     include 'OCEAuthDir.a'
  35.     ENDIF
  36.     IF FOR_SYSTEM7_ONLY THEN
  37. ;  Collaboration Package Gestalts. 
  38.  
  39. gestaltSDPStandardDirectoryVersion EQU    'sdvr'
  40. gestaltSDPFindVersion            EQU        'dfnd'
  41. gestaltSDPPromptVersion            EQU        'prpv'
  42.     ENDIF
  43.     IF FOR_SYSTEM7_ONLY THEN
  44. ;  generic icon suites 
  45.  
  46. genericDirectoryIconResource    EQU        -16721                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  47. genericLockedDirectoryIconResource EQU    -16716                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  48. genericRecordIconResource        EQU        -16722                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  49. genericAttributeIconResource    EQU        -16723                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  50. genericTemplateIconResource        EQU        -16746                ; icl8, icl4, ICN#, ics#, ics4, ics8 
  51. ;  standard icon suites 
  52.  
  53. directoryFolderIconResource        EQU        -16720                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  54. lockedDirectoryFolderIconResource EQU    -16719                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  55. personalDirectoryIconResource    EQU        -16718                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  56. directoriesIconResource            EQU        -16717                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  57. preferredPersonalDirectoryIconResource EQU -16724            ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  58. ;  icon IDs for spinning arrows 
  59.  
  60. kFirstSpinnerIcon                EQU        -16745
  61. kLastSpinnerIcon                EQU        -16738
  62. ;  resource types 
  63.  
  64. kSDPPanelResourceType            EQU        'panl'
  65. kSDPFindPanelResourceType        EQU        'find'
  66. ;  Standard FindPanel resource 
  67.  
  68. kStandardFindLayout                EQU        -16700
  69. ;  Prompt For Identity structures 
  70.  
  71. kSDPGuestBit                    EQU        0
  72. kSDPSpecificIdentityBit            EQU        1
  73. kSDPLocalIdentityBit            EQU        2
  74. ;  Values of SDPIdentityKind 
  75.  
  76. kSDPGuestMask                    EQU        1
  77. kSDPSpecificIdentityMask        EQU        2
  78. kSDPLocalIdentityMask            EQU        4
  79. ; typedef unsigned short                 SDPIdentityKind
  80.  
  81.  
  82. kSDPSuggestionOnly                EQU        0
  83. kSDPRestrictToDirectory            EQU        1
  84. kSDPRestrictToRecord            EQU        2
  85. ; typedef unsigned short                 SDPLoginFilterKind
  86.  
  87. ;  Panel Structures 
  88. ;
  89. ;While the panel is in operation, four selection states may exist.
  90. ;    1) kSDPNothingSelected means nothing is selected.
  91. ;    2) kContainSelected means a volume, folder, catalog, dnode, or PAB is selected.
  92. ;    3) kSDPLockedContainerSelected means one of the above, but no access privledges.
  93. ;    4) kSDPRecordSelected means that a record is currently selected.
  94. ;
  95. ;  Values of SDPSelectionState 
  96.  
  97. kSDPNothingSelected                EQU        0
  98. kSDPLockedContainerSelected        EQU        1
  99. kSDPContainerSelected            EQU        2
  100. kSDPRecordSelected                EQU        3
  101. kSDPRecordAliasSelected            EQU        4
  102. kSDPContainerAliasSelected        EQU        5
  103. ; typedef unsigned short                 SDPSelectionState
  104.  
  105. ;
  106. ;This type informs the caller of the action the user took, either as the result
  107. ;of an event (as returned by SDPPanelEvent) or when SDPOpenSelectedItem is called.
  108. ;
  109. ;kSDPProcessed means that the event (or call to SDPOpenSelectedItem) resulted in no
  110. ;state change.
  111. ;
  112. ;kSDPSelectedAnItem indicates that the user wants to select the currently-hilited
  113. ;record. This is returned, for example, when a user double-clicks on a record.
  114. ;
  115. ;kSDPChangedSelection implies that the user clicked on a new item (which may mean
  116. ;that no item is selected).
  117. ;
  118. ;  Values of SDPPanelState 
  119.  
  120. kSDPProcessed                    EQU        0
  121. kSDPSelectedAnItem                EQU        1
  122. kSDPChangedSelection            EQU        2
  123. ; typedef unsigned short                 SDPPanelState
  124.  
  125. ;
  126. ;Your application may read any of the fields in a SDPPanelRecord, but it should
  127. ;use the appropriate routines to make changes to the records with the exception
  128. ;of the refCon field which your application may read or write at will.  Private
  129. ;information follows the SDPPanelRecord, so the handle must not be re-sized.
  130. ;
  131. SDPPanelRecord            RECORD 0
  132. bounds                     ds        Rect            ; offset: $0 (0)
  133. visible                     ds.b    1                ; offset: $8 (8)
  134. enabled                     ds.b    1                ; offset: $9 (9)
  135. focused                     ds.b    1                ; offset: $A (10)
  136. padByte                     ds.b    1                ; offset: $B (11)
  137. identity                 ds.l    1                ; offset: $C (12)
  138. refCon                     ds.l    1                ; offset: $10 (16)
  139. listRect                 ds        Rect            ; offset: $14 (20)
  140. popupRect                 ds        Rect            ; offset: $1C (28)
  141. numberOfRows             ds.w    1                ; offset: $24 (36)
  142. rowHeight                 ds.w    1                ; offset: $26 (38)
  143. pabMode                     ds.b    1                ; offset: $28 (40)
  144. filler1                     ds.b    1                ; offset: $29 (41)
  145. sizeof                     EQU *                    ; size:   $2A (42)
  146.                         ENDR
  147. ; typedef struct SDPPanelRecord *        SDPPanelPtr
  148.  
  149. ; typedef SDPPanelPtr *                    SDPPanelHandle
  150.  
  151. ; typedef PanelBusyUPP                     PanelBusyProc
  152.  
  153. ;  Find Panel Structures 
  154.  
  155. kSDPItemIsSelectedBit            EQU        0
  156. kSDPFindTextExistsBit            EQU        1
  157. ;  Values of SDPFindPanelState 
  158.  
  159. kSDPItemIsSelectedMask            EQU        $01
  160. kSDPFindTextExistsMask            EQU        $02
  161. ; typedef unsigned short                 SDPFindPanelState
  162.  
  163. ;  Values of SDPFindPanelFocus 
  164.  
  165. kSDPFindPanelNoFocus            EQU        0
  166. kSDPFindPanelListHasFocus        EQU        1
  167. kSDPFindPanelTextHasFocus        EQU        2
  168. ; typedef unsigned short                 SDPFindPanelFocus
  169.  
  170. SDPFindPanelRecord        RECORD 0
  171. upperLeft                 ds        Point            ; offset: $0 (0)
  172. visible                     ds.b    1                ; offset: $4 (4)
  173. enabled                     ds.b    1                ; offset: $5 (5)
  174. nowFinding                 ds.b    1                ; offset: $6 (6)
  175. padByte                     ds.b    1                ; offset: $7 (7)
  176. currentFocus             ds.w    1                ; offset: $8 (8)
  177. identity                 ds.l    1                ; offset: $A (10)
  178. simultaneousSearchCount     ds.w    1                ; offset: $E (14)
  179. refCon                     ds.l    1                ; offset: $10 (16)
  180. sizeof                     EQU *                    ; size:   $14 (20)
  181.                         ENDR
  182. ; typedef struct SDPFindPanelRecord *    SDPFindPanelPtr
  183.  
  184. ; typedef SDPFindPanelPtr *                SDPFindPanelHandle
  185.  
  186. ;  Values of SDPFindPanelResult 
  187.  
  188. kSDPSelectedAFindItem            EQU        0
  189. kSDPFindSelectionChanged        EQU        1
  190. kSDPFindCompleted                EQU        2
  191. kSDPTextStateChanged            EQU        3
  192. kSDPFocusChanged                EQU        4
  193. kSDPSelectionAndFocusChanged    EQU        5
  194. kSDPMenuChanged                    EQU        6
  195. kSDPSelectionAndMenuChanged        EQU        7
  196. kSDPProcessedFind                EQU        8
  197. ; typedef unsigned short                 SDPFindPanelResult
  198.  
  199. ; typedef PackedPathNamePtr *            PackedRStringListHandle
  200.  
  201. ; typedef FindPanelBusyUPP                 FindPanelBusyProc
  202.  
  203. ;  Prompt For Identity Routines 
  204. ;
  205. ; pascal OSErr SDPPromptForID(AuthIdentity *id, ConstStr255Param guestPrompt, ConstStr255Param specificIDPrompt, ConstStr255Param localIDPrompt, const RString *recordType, SDPIdentityKind permittedKinds, SDPIdentityKind *selectedKind, const RecordID *loginFilter, SDPLoginFilterKind filterKind)
  206. ;
  207.     IF ¬ GENERATINGCFM THEN
  208.         Macro
  209.         _SDPPromptForID
  210.             move.l              #$00100388,D0
  211.             dc.w                $AA5D
  212.         EndM
  213.     ELSE
  214.         IMPORT_CFM_FUNCTION SDPPromptForID
  215.     ENDIF
  216.  
  217. ;
  218. ;SDPNewPanel creates a new panel. You supply the window in which the panel
  219. ;is to live, the bounds for the panel (which includes both the menu and the list),
  220. ;whether or not the panel is to be initially visible, the initial RLI (nil for
  221. ;catalogs and volumes), the types of records that will be shown (only a single
  222. ;(non-nil) type which may contain wildcards), the identity by which to browse
  223. ;(for access control reasons), and a refCon which is  available to the caller.
  224. ;
  225. ;
  226. ; pascal OSErr SDPNewPanel(SDPPanelHandle *newPanel, WindowRef window, const Rect *bounds, Boolean visible, Boolean enabled, const PackedRLI *initialRLI, const RStringPtr *typesList, unsigned long typeCount, AuthIdentity identity, DirEnumChoices enumFlags, DirMatchWith matchTypeHow, long refCon)
  227. ;
  228.     IF ¬ GENERATINGCFM THEN
  229.         Macro
  230.         _SDPNewPanel
  231.             move.l              #$00150064,D0
  232.             dc.w                $AA5D
  233.         EndM
  234.     ELSE
  235.         IMPORT_CFM_FUNCTION SDPNewPanel
  236.     ENDIF
  237.  
  238. ;
  239. ;SDPSetIdentity Sets the identity used for browsing.  NOTE: This call is likely to go
  240. ;away if the new authentication scheme works.
  241. ;
  242. ;
  243. ; pascal OSErr SDPSetIdentity(SDPPanelHandle panel, AuthIdentity identity)
  244. ;
  245.     IF ¬ GENERATINGCFM THEN
  246.         Macro
  247.         _SDPSetIdentity
  248.             move.l              #$00040073,D0
  249.             dc.w                $AA5D
  250.         EndM
  251.     ELSE
  252.         IMPORT_CFM_FUNCTION SDPSetIdentity
  253.     ENDIF
  254.  
  255. ;
  256. ;SDPGetNewPanel is similar to SDPNewPanel above, except it takes a resource id of a
  257. ;'panl' resource.
  258. ;
  259. ;
  260. ; pascal OSErr SDPGetNewPanel(SDPPanelHandle *newPanel, short resourceID, WindowRef window, const PackedRLI *initialRLI, AuthIdentity identity)
  261. ;
  262.     IF ¬ GENERATINGCFM THEN
  263.         Macro
  264.         _SDPGetNewPanel
  265.             move.l              #$00090065,D0
  266.             dc.w                $AA5D
  267.         EndM
  268.     ELSE
  269.         IMPORT_CFM_FUNCTION SDPGetNewPanel
  270.     ENDIF
  271.  
  272. ;
  273. ;Call this when you're completely done with a panel. It deallocates all of the
  274. ;associated data structures.
  275. ;
  276. ;
  277. ; pascal OSErr SDPDisposePanel(SDPPanelHandle panel)
  278. ;
  279.     IF ¬ GENERATINGCFM THEN
  280.         Macro
  281.         _SDPDisposePanel
  282.             move.l              #$00020066,D0
  283.             dc.w                $AA5D
  284.         EndM
  285.     ELSE
  286.         IMPORT_CFM_FUNCTION SDPDisposePanel
  287.     ENDIF
  288.  
  289. ;
  290. ;If the panel is visible, it makes it invisible by hiding the menu, turning off
  291. ;drawing of the list, and erasing and  invaling the list's rectangle.
  292. ;
  293. ;
  294. ; pascal OSErr SDPHidePanel(SDPPanelHandle panel)
  295. ;
  296.     IF ¬ GENERATINGCFM THEN
  297.         Macro
  298.         _SDPHidePanel
  299.             move.l              #$00020067,D0
  300.             dc.w                $AA5D
  301.         EndM
  302.     ELSE
  303.         IMPORT_CFM_FUNCTION SDPHidePanel
  304.     ENDIF
  305.  
  306. ;  If the panel is invisible, it makes it visible and draws it. 
  307. ;
  308. ; pascal OSErr SDPShowPanel(SDPPanelHandle panel)
  309. ;
  310.     IF ¬ GENERATINGCFM THEN
  311.         Macro
  312.         _SDPShowPanel
  313.             move.l              #$00020068,D0
  314.             dc.w                $AA5D
  315.         EndM
  316.     ELSE
  317.         IMPORT_CFM_FUNCTION SDPShowPanel
  318.     ENDIF
  319.  
  320. ;  Disables the list and menu so that it won't accept any commands. 
  321. ;
  322. ; pascal OSErr SDPEnablePanel(SDPPanelHandle panel, Boolean enable)
  323. ;
  324.     IF ¬ GENERATINGCFM THEN
  325.         Macro
  326.         _SDPEnablePanel
  327.             move.l              #$00030069,D0
  328.             dc.w                $AA5D
  329.         EndM
  330.     ELSE
  331.         IMPORT_CFM_FUNCTION SDPEnablePanel
  332.     ENDIF
  333.  
  334. ;
  335. ;Move the upper-left-hand corner of the panel to (h,v), given in local coordinates of
  336. ;the panel's window.
  337. ;
  338. ;
  339. ; pascal OSErr SDPMovePanel(SDPPanelHandle panel, short h, short v)
  340. ;
  341.     IF ¬ GENERATINGCFM THEN
  342.         Macro
  343.         _SDPMovePanel
  344.             move.l              #$0004006B,D0
  345.             dc.w                $AA5D
  346.         EndM
  347.     ELSE
  348.         IMPORT_CFM_FUNCTION SDPMovePanel
  349.     ENDIF
  350.  
  351. ;
  352. ;Resizes the panel to have the given width and height (keeping the upper-left-hand
  353. ;corner in a fixed position).
  354. ;
  355. ;
  356. ; pascal OSErr SDPSizePanel(SDPPanelHandle panel, short width, short height)
  357. ;
  358.     IF ¬ GENERATINGCFM THEN
  359.         Macro
  360.         _SDPSizePanel
  361.             move.l              #$0004006C,D0
  362.             dc.w                $AA5D
  363.         EndM
  364.     ELSE
  365.         IMPORT_CFM_FUNCTION SDPSizePanel
  366.     ENDIF
  367.  
  368. ;
  369. ;This routine simulates a double-click on the selected item (if there is no selected
  370. ;item, then it does nothing), and it returns the result of that "double-click" via the
  371. ;whatHappened parameter. If a container is selected, then that container will be
  372. ;opened and kMovedDownTheHierarchy is returned. If, however, the user is at the lowest
  373. ;level in the hierarchy, then kSDPSelectedAnItem is returned.
  374. ;
  375. ;
  376. ; pascal OSErr SDPOpenSelectedItem(SDPPanelHandle panel, SDPPanelState *whatHappened)
  377. ;
  378.     IF ¬ GENERATINGCFM THEN
  379.         Macro
  380.         _SDPOpenSelectedItem
  381.             move.l              #$0004006D,D0
  382.             dc.w                $AA5D
  383.         EndM
  384.     ELSE
  385.         IMPORT_CFM_FUNCTION SDPOpenSelectedItem
  386.     ENDIF
  387.  
  388. ;
  389. ;Returns whether a record is selected, something else is selected, or nothing is
  390. ;selected.
  391. ;
  392. ;
  393. ; pascal OSErr SDPGetPanelSelectionState(SDPPanelHandle panel, SDPSelectionState *itsState)
  394. ;
  395.     IF ¬ GENERATINGCFM THEN
  396.         Macro
  397.         _SDPGetPanelSelectionState
  398.             move.l              #$0004006E,D0
  399.             dc.w                $AA5D
  400.         EndM
  401.     ELSE
  402.         IMPORT_CFM_FUNCTION SDPGetPanelSelectionState
  403.     ENDIF
  404.  
  405. ;
  406. ;Returns the size of the currently-selected DSSpec, or zero if a record is
  407. ;not selected.  It is safe to do a NewPtr (SDPGetPanelSelectionSize (...))
  408. ;
  409. ;
  410. ; pascal OSErr SDPGetPanelSelectionSize(SDPPanelHandle panel, unsigned short *dsSpecSize)
  411. ;
  412.     IF ¬ GENERATINGCFM THEN
  413.         Macro
  414.         _SDPGetPanelSelectionSize
  415.             move.l              #$00040072,D0
  416.             dc.w                $AA5D
  417.         EndM
  418.     ELSE
  419.         IMPORT_CFM_FUNCTION SDPGetPanelSelectionSize
  420.     ENDIF
  421.  
  422. ;
  423. ;Returns the currently-selected DSSpec, or a zero-lengthed
  424. ;DSSpec if a record is not selected. It is assumed that the selection
  425. ;buffer allocated is large enough.
  426. ;
  427. ;
  428. ; pascal OSErr SDPGetPanelSelection(SDPPanelHandle panel, PackedDSSpec *selection)
  429. ;
  430.     IF ¬ GENERATINGCFM THEN
  431.         Macro
  432.         _SDPGetPanelSelection
  433.             move.l              #$0004006F,D0
  434.             dc.w                $AA5D
  435.         EndM
  436.     ELSE
  437.         IMPORT_CFM_FUNCTION SDPGetPanelSelection
  438.     ENDIF
  439.  
  440. ;
  441. ;Forces browsing to the specified RLI. If prli is the current RLI, then it does
  442. ;nothing.
  443. ;
  444. ;
  445. ; pascal OSErr SDPSetPath(SDPPanelHandle panel, const PackedRLI *prli)
  446. ;
  447.     IF ¬ GENERATINGCFM THEN
  448.         Macro
  449.         _SDPSetPath
  450.             move.l              #$00040070,D0
  451.             dc.w                $AA5D
  452.         EndM
  453.     ELSE
  454.         IMPORT_CFM_FUNCTION SDPSetPath
  455.     ENDIF
  456.  
  457. ;
  458. ;This is the main driver for the panel.  You should pass all events to SDPPanelEvent
  459. ;including NULL events.  If you have more than 1 panel, you will need to
  460. ;call SDPPanelEvent for each panel.  NOTE:  For Update Events you will also need to call
  461. ;SDPUpdatePanel as described below.
  462. ;
  463. ;
  464. ; pascal OSErr SDPPanelEvent(SDPPanelHandle panel, const EventRecord *theEvent, SDPPanelState *whatHappened)
  465. ;
  466.     IF ¬ GENERATINGCFM THEN
  467.         Macro
  468.         _SDPPanelEvent
  469.             move.l              #$00060071,D0
  470.             dc.w                $AA5D
  471.         EndM
  472.     ELSE
  473.         IMPORT_CFM_FUNCTION SDPPanelEvent
  474.     ENDIF
  475.  
  476. ;
  477. ;SDPUpdatePanel should be called in response to an update event.  Generally you will
  478. ;have first called BeginUpdate, and pass the windows visRgn as theRgn.  If NULL
  479. ;is passed for theRgn the entire panel is re-drawn.  NOTE:  Drawing is not cliped to
  480. ;theRgn, if this is desired, you must first call SetClip.
  481. ;
  482. ;
  483. ; pascal OSErr SDPUpdatePanel(SDPPanelHandle panel, RgnHandle theRgn)
  484. ;
  485.     IF ¬ GENERATINGCFM THEN
  486.         Macro
  487.         _SDPUpdatePanel
  488.             move.l              #$0004006A,D0
  489.             dc.w                $AA5D
  490.         EndM
  491.     ELSE
  492.         IMPORT_CFM_FUNCTION SDPUpdatePanel
  493.     ENDIF
  494.  
  495. ;
  496. ;SDPSelectString scrolls and selects the closest matching string at the current
  497. ;level.  This is the same behavior as if the user typed in the given string.
  498. ;
  499. ;
  500. ; pascal OSErr SDPSelectString(SDPPanelHandle panel, const RString *name)
  501. ;
  502.     IF ¬ GENERATINGCFM THEN
  503.         Macro
  504.         _SDPSelectString
  505.             move.l              #$00040074,D0
  506.             dc.w                $AA5D
  507.         EndM
  508.     ELSE
  509.         IMPORT_CFM_FUNCTION SDPSelectString
  510.     ENDIF
  511.  
  512. ;
  513. ;SDPGetPathLength returns the length in bytes required to hold the current path name
  514. ;in RLI format.  This corresponds to the path name in the popup menu.
  515. ;
  516. ;
  517. ; pascal OSErr SDPGetPathLength(SDPPanelHandle panel, unsigned short *pathNameLength)
  518. ;
  519.     IF ¬ GENERATINGCFM THEN
  520.         Macro
  521.         _SDPGetPathLength
  522.             move.l              #$00040075,D0
  523.             dc.w                $AA5D
  524.         EndM
  525.     ELSE
  526.         IMPORT_CFM_FUNCTION SDPGetPathLength
  527.     ENDIF
  528.  
  529. ;  SDPGetPath returns the current rli. 
  530. ;
  531. ; pascal OSErr SDPGetPath(SDPPanelHandle panel, PackedRLI *prli, short *dsRefNum)
  532. ;
  533.     IF ¬ GENERATINGCFM THEN
  534.         Macro
  535.         _SDPGetPath
  536.             move.l              #$00060076,D0
  537.             dc.w                $AA5D
  538.         EndM
  539.     ELSE
  540.         IMPORT_CFM_FUNCTION SDPGetPath
  541.     ENDIF
  542.  
  543. ;
  544. ;SDPSetFocus will draw the focus rectangle or erase the focus rectangle depending upon
  545. ;the focus boolean.
  546. ;
  547. ;
  548. ; pascal OSErr SDPSetFocus(SDPPanelHandle panel, Boolean focus)
  549. ;
  550.     IF ¬ GENERATINGCFM THEN
  551.         Macro
  552.         _SDPSetFocus
  553.             move.l              #$00030077,D0
  554.             dc.w                $AA5D
  555.         EndM
  556.     ELSE
  557.         IMPORT_CFM_FUNCTION SDPSetFocus
  558.     ENDIF
  559.  
  560. ;
  561. ;SDPSetPanelBalloonHelp allows clients to specify a STR# resource id to use for 
  562. ;balloon help.  Balloon help is unavailable until this call is made.
  563. ;
  564. ;
  565. ; pascal OSErr SDPSetPanelBalloonHelp(SDPPanelHandle panel, short balloonHelpID)
  566. ;
  567.     IF ¬ GENERATINGCFM THEN
  568.         Macro
  569.         _SDPSetPanelBalloonHelp
  570.             move.l              #$00030078,D0
  571.             dc.w                $AA5D
  572.         EndM
  573.     ELSE
  574.         IMPORT_CFM_FUNCTION SDPSetPanelBalloonHelp
  575.     ENDIF
  576.  
  577. ;
  578. ;SDPInstallPanelBusyProc allows clients to install a CB that will be called while
  579. ;the panel is aynchronously busy.
  580. ;
  581. ;
  582. ; pascal OSErr SDPInstallPanelBusyProc(SDPPanelHandle panel, PanelBusyProc busyProc)
  583. ;
  584.     IF ¬ GENERATINGCFM THEN
  585.         Macro
  586.         _SDPInstallPanelBusyProc
  587.             move.l              #$00040079,D0
  588.             dc.w                $AA5D
  589.         EndM
  590.     ELSE
  591.         IMPORT_CFM_FUNCTION SDPInstallPanelBusyProc
  592.     ENDIF
  593.  
  594. ;
  595. ; pascal OSErr SDPNewFindPanel(SDPFindPanelHandle *newPanel, WindowRef window, Point upperLeft, short layoutResourceID, Boolean visible, Boolean enabled, const RStringPtr *typesList, long typeCount, DirMatchWith matchTypeHow, AuthIdentity identity, short simultaneousSearchCount, SDPFindPanelFocus initialFocus, long refCon)
  596. ;
  597.     IF ¬ GENERATINGCFM THEN
  598.         Macro
  599.         _SDPNewFindPanel
  600.             move.l              #$001408FC,D0
  601.             dc.w                $AA5D
  602.         EndM
  603.     ELSE
  604.         IMPORT_CFM_FUNCTION SDPNewFindPanel
  605.     ENDIF
  606.  
  607. ;
  608. ; pascal OSErr SDPDisposeFindPanel(SDPFindPanelHandle findPanel)
  609. ;
  610.     IF ¬ GENERATINGCFM THEN
  611.         Macro
  612.         _SDPDisposeFindPanel
  613.             move.l              #$000208FD,D0
  614.             dc.w                $AA5D
  615.         EndM
  616.     ELSE
  617.         IMPORT_CFM_FUNCTION SDPDisposeFindPanel
  618.     ENDIF
  619.  
  620. ;
  621. ; pascal OSErr SDPStartFind(SDPFindPanelHandle findPanel)
  622. ;
  623.     IF ¬ GENERATINGCFM THEN
  624.         Macro
  625.         _SDPStartFind
  626.             move.l              #$000208FE,D0
  627.             dc.w                $AA5D
  628.         EndM
  629.     ELSE
  630.         IMPORT_CFM_FUNCTION SDPStartFind
  631.     ENDIF
  632.  
  633. ;
  634. ; pascal OSErr SDPStopFind(SDPFindPanelHandle findPanel)
  635. ;
  636.     IF ¬ GENERATINGCFM THEN
  637.         Macro
  638.         _SDPStopFind
  639.             move.l              #$000208FF,D0
  640.             dc.w                $AA5D
  641.         EndM
  642.     ELSE
  643.         IMPORT_CFM_FUNCTION SDPStopFind
  644.     ENDIF
  645.  
  646. ;
  647. ; pascal OSErr SDPFindPanelEvent(SDPFindPanelHandle findPanel, const EventRecord *event, SDPFindPanelResult *whatHappened)
  648. ;
  649.     IF ¬ GENERATINGCFM THEN
  650.         Macro
  651.         _SDPFindPanelEvent
  652.             move.l              #$00060900,D0
  653.             dc.w                $AA5D
  654.         EndM
  655.     ELSE
  656.         IMPORT_CFM_FUNCTION SDPFindPanelEvent
  657.     ENDIF
  658.  
  659. ;
  660. ; pascal OSErr SDPUpdateFindPanel(SDPFindPanelHandle findPanel, RgnHandle theRgn)
  661. ;
  662.     IF ¬ GENERATINGCFM THEN
  663.         Macro
  664.         _SDPUpdateFindPanel
  665.             move.l              #$00040901,D0
  666.             dc.w                $AA5D
  667.         EndM
  668.     ELSE
  669.         IMPORT_CFM_FUNCTION SDPUpdateFindPanel
  670.     ENDIF
  671.  
  672. ;
  673. ; pascal OSErr SDPShowFindPanel(SDPFindPanelHandle findPanel)
  674. ;
  675.     IF ¬ GENERATINGCFM THEN
  676.         Macro
  677.         _SDPShowFindPanel
  678.             move.l              #$00020902,D0
  679.             dc.w                $AA5D
  680.         EndM
  681.     ELSE
  682.         IMPORT_CFM_FUNCTION SDPShowFindPanel
  683.     ENDIF
  684.  
  685. ;
  686. ; pascal OSErr SDPHideFindPanel(SDPFindPanelHandle findPanel)
  687. ;
  688.     IF ¬ GENERATINGCFM THEN
  689.         Macro
  690.         _SDPHideFindPanel
  691.             move.l              #$00020903,D0
  692.             dc.w                $AA5D
  693.         EndM
  694.     ELSE
  695.         IMPORT_CFM_FUNCTION SDPHideFindPanel
  696.     ENDIF
  697.  
  698. ;
  699. ; pascal OSErr SDPMoveFindPanel(SDPFindPanelHandle findPanel, short h, short v)
  700. ;
  701.     IF ¬ GENERATINGCFM THEN
  702.         Macro
  703.         _SDPMoveFindPanel
  704.             move.l              #$00040904,D0
  705.             dc.w                $AA5D
  706.         EndM
  707.     ELSE
  708.         IMPORT_CFM_FUNCTION SDPMoveFindPanel
  709.     ENDIF
  710.  
  711. ;
  712. ; pascal OSErr SDPEnableFindPanel(SDPFindPanelHandle findPanel, Boolean enabled)
  713. ;
  714.     IF ¬ GENERATINGCFM THEN
  715.         Macro
  716.         _SDPEnableFindPanel
  717.             move.l              #$00030905,D0
  718.             dc.w                $AA5D
  719.         EndM
  720.     ELSE
  721.         IMPORT_CFM_FUNCTION SDPEnableFindPanel
  722.     ENDIF
  723.  
  724. ;
  725. ; pascal OSErr SDPSetFindPanelFocus(SDPFindPanelHandle findPanel, SDPFindPanelFocus newFocus)
  726. ;
  727.     IF ¬ GENERATINGCFM THEN
  728.         Macro
  729.         _SDPSetFindPanelFocus
  730.             move.l              #$00030906,D0
  731.             dc.w                $AA5D
  732.         EndM
  733.     ELSE
  734.         IMPORT_CFM_FUNCTION SDPSetFindPanelFocus
  735.     ENDIF
  736.  
  737. ;
  738. ; pascal OSErr SDPGetFindPanelState(SDPFindPanelHandle findPanel, SDPFindPanelState *itsState)
  739. ;
  740.     IF ¬ GENERATINGCFM THEN
  741.         Macro
  742.         _SDPGetFindPanelState
  743.             move.l              #$00040907,D0
  744.             dc.w                $AA5D
  745.         EndM
  746.     ELSE
  747.         IMPORT_CFM_FUNCTION SDPGetFindPanelState
  748.     ENDIF
  749.  
  750. ;
  751. ; pascal OSErr SDPGetFindPanelSelectionSize(SDPFindPanelHandle findPanel, unsigned short *size)
  752. ;
  753.     IF ¬ GENERATINGCFM THEN
  754.         Macro
  755.         _SDPGetFindPanelSelectionSize
  756.             move.l              #$00040908,D0
  757.             dc.w                $AA5D
  758.         EndM
  759.     ELSE
  760.         IMPORT_CFM_FUNCTION SDPGetFindPanelSelectionSize
  761.     ENDIF
  762.  
  763. ;
  764. ; pascal OSErr SDPGetFindPanelSelection(SDPFindPanelHandle findPanel, PackedDSSpec *selection)
  765. ;
  766.     IF ¬ GENERATINGCFM THEN
  767.         Macro
  768.         _SDPGetFindPanelSelection
  769.             move.l              #$00040909,D0
  770.             dc.w                $AA5D
  771.         EndM
  772.     ELSE
  773.         IMPORT_CFM_FUNCTION SDPGetFindPanelSelection
  774.     ENDIF
  775.  
  776. ;
  777. ; pascal OSErr SDPSetFindPanelBalloonHelp(SDPFindPanelHandle findPanel, short balloonHelpID)
  778. ;
  779.     IF ¬ GENERATINGCFM THEN
  780.         Macro
  781.         _SDPSetFindPanelBalloonHelp
  782.             move.l              #$0003090A,D0
  783.             dc.w                $AA5D
  784.         EndM
  785.     ELSE
  786.         IMPORT_CFM_FUNCTION SDPSetFindPanelBalloonHelp
  787.     ENDIF
  788.  
  789. ;
  790. ; pascal OSErr SDPSetFindIdentity(SDPFindPanelHandle findPanel, AuthIdentity identity)
  791. ;
  792.     IF ¬ GENERATINGCFM THEN
  793.         Macro
  794.         _SDPSetFindIdentity
  795.             move.l              #$0004090B,D0
  796.             dc.w                $AA5D
  797.         EndM
  798.     ELSE
  799.         IMPORT_CFM_FUNCTION SDPSetFindIdentity
  800.     ENDIF
  801.  
  802. ;
  803. ; pascal OSErr SDPInstallFindPanelBusyProc(SDPFindPanelHandle findPanel, FindPanelBusyProc busyProc)
  804. ;
  805.     IF ¬ GENERATINGCFM THEN
  806.         Macro
  807.         _SDPInstallFindPanelBusyProc
  808.             move.l              #$0004090C,D0
  809.             dc.w                $AA5D
  810.         EndM
  811.     ELSE
  812.         IMPORT_CFM_FUNCTION SDPInstallFindPanelBusyProc
  813.     ENDIF
  814.  
  815. ;
  816. ; pascal OSErr SDPGetIconByType(const RString *recordType, IconSelectorValue whichIcons, Handle *iconSuite)
  817. ;
  818.     IF ¬ GENERATINGCFM THEN
  819.         Macro
  820.         _SDPGetIconByType
  821.             move.w              #$0400,D0
  822.             dc.w                $AA5C
  823.         EndM
  824.     ELSE
  825.         IMPORT_CFM_FUNCTION SDPGetIconByType
  826.     ENDIF
  827.  
  828. ;
  829. ; pascal OSErr SDPGetDSSpecIcon(const PackedDSSpec *packedDSSpec, IconSelectorValue whichIcons, Handle *iconSuite)
  830. ;
  831.     IF ¬ GENERATINGCFM THEN
  832.         Macro
  833.         _SDPGetDSSpecIcon
  834.             move.w              #$0401,D0
  835.             dc.w                $AA5C
  836.         EndM
  837.     ELSE
  838.         IMPORT_CFM_FUNCTION SDPGetDSSpecIcon
  839.     ENDIF
  840.  
  841. ;
  842. ; pascal OSErr SDPGetCategories(PackedRStringListHandle *categories, PackedRStringListHandle *displayNames)
  843. ;
  844.     IF ¬ GENERATINGCFM THEN
  845.         Macro
  846.         _SDPGetCategories
  847.             move.w              #$0402,D0
  848.             dc.w                $AA5C
  849.         EndM
  850.     ELSE
  851.         IMPORT_CFM_FUNCTION SDPGetCategories
  852.     ENDIF
  853.  
  854. ;
  855. ; pascal OSErr SDPGetCategoryTypes(const RString *category, PackedRStringListHandle *types)
  856. ;
  857.     IF ¬ GENERATINGCFM THEN
  858.         Macro
  859.         _SDPGetCategoryTypes
  860.             move.w              #$0403,D0
  861.             dc.w                $AA5C
  862.         EndM
  863.     ELSE
  864.         IMPORT_CFM_FUNCTION SDPGetCategoryTypes
  865.     ENDIF
  866.  
  867. ;
  868. ; pascal OSErr SDPResolveAliasFile(FSSpecPtr fileSpec, PackedDSSpecHandle resolvedDSSpec, AuthIdentity identity, Boolean mayPromptUser)
  869. ;
  870.     IF ¬ GENERATINGCFM THEN
  871.         Macro
  872.         _SDPResolveAliasFile
  873.             move.l              #$00070E74,D0
  874.             dc.w                $AA5D
  875.         EndM
  876.     ELSE
  877.         IMPORT_CFM_FUNCTION SDPResolveAliasFile
  878.     ENDIF
  879.  
  880. ;
  881. ; pascal OSErr SDPResolveAliasDSSpec(PackedDSSpecHandle theAliasDSSpec, AuthIdentity identity, Boolean mayPromptUser)
  882. ;
  883.     IF ¬ GENERATINGCFM THEN
  884.         Macro
  885.         _SDPResolveAliasDSSpec
  886.             move.l              #$00050E75,D0
  887.             dc.w                $AA5D
  888.         EndM
  889.     ELSE
  890.         IMPORT_CFM_FUNCTION SDPResolveAliasDSSpec
  891.     ENDIF
  892.  
  893. ;
  894. ; pascal OSErr SDPRepairPersonalDirectory(FSSpec *pd, Boolean showProgress)
  895. ;
  896.     IF ¬ GENERATINGCFM THEN
  897.         Macro
  898.         _SDPRepairPersonalDirectory
  899.             move.l              #$00031A2C,D0
  900.             dc.w                $AA5D
  901.         EndM
  902.     ELSE
  903.         IMPORT_CFM_FUNCTION SDPRepairPersonalDirectory
  904.     ENDIF
  905.  
  906.     ENDIF
  907.     ENDIF ; __OCESTANDARDDIRECTORY__ 
  908.  
  909.